1000
|
It is possible to clip the bar's caption to bar, when the time scale is changed

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 48");
_ObjectSetProperty( chart , "FirstVisibleDate", "12/27/2000");
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "Pattern", 32);
_ObjectSetProperty( bar , "Height", 13);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/6/2001","K1","This is a bit of text that get's clipped");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K1`,4) = 4");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K1`,6) = ItemBar(h,`K1`,3)");
h = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/6/2001","K1","This is a bit of text that is not clipped");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K1`,4) = 1");
|
999
|
How can I change the color for all bars with the key matching a pattern

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 64");
_ObjectSetProperty( g2antt , "Debug", -1);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/4/2001","A");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/7/2001","B1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/8/2001","1/17/2001","B2");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 2"),"Task","1/2/2001","1/4/2001","K3");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 4"),"Task","1/2/2001","1/4/2001","B4");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(0,`<B*>`,33) = 255");
|
998
|
How can I change the color for all bars in the same item with the key matching a pattern

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 64");
_ObjectSetProperty( g2antt , "Debug", -1);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/4/2001","A");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/7/2001","B1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/8/2001","1/17/2001","B2");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 2"),"Task","1/2/2001","1/4/2001","K3");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 4"),"Task","1/2/2001","1/4/2001","K4");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`<B*>`,33) = 255");
|
997
|
How can I change the color for all bars in the same item

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/7/2001","K2");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 2"),"Task","1/2/2001","1/4/2001","K3");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 4"),"Task","1/2/2001","1/4/2001","K4");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`<*>`,33) = 255");
|
996
|
How can I write a special number for each date related to a bar

OBJECT chart,g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 32");
_ObjectSetProperty( chart , "LevelCount", 2);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/13/2001","1");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "N1",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "S+2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `4`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = -9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 65535");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(0) = True");
note = _ObjectCallMethod( notes , "Add", "N2",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "S+3");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `4`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = -9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 65535");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(0) = True");
note = _ObjectCallMethod( notes , "Add", "N3",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "S+4");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `5`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = -9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 65280");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(0) = True");
note = _ObjectCallMethod( notes , "Add", "N4",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "S+5");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `5`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = -9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 65280");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(0) = True");
note = _ObjectCallMethod( notes , "Add", "N5",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "S+6");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `8`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = -9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 255");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(0) = True");
note = _ObjectCallMethod( notes , "Add", "Z",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "E");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `4`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = -9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 33023");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartCanMove(0) = True");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(0) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
995
|
How can I assign a note to be always in the center of the bar

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "Note",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", 0.5);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `note<br>center`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 65535");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(1) = False");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
994
|
How can I assign a note relative to the start of the bar, and let it be movable

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "Note",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "S+1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `<%d%>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = 9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartCanMove(0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 65535");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(1) = False");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
993
|
How can I associate a note relative to the start of the bar

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "Note",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "S+1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `<%d%>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = 9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBackColor(0) = 65535");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(1) = False");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
992
|
How can I associate a note relative to the end of the bar, so if the bar is resized at the end, the not is moved accordingly

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "Note",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", "E-1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `<%d%>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 18");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(0) = 9");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(1) = False");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
991
|
How can I associate a note relative to the end of the bar, so if the bar is resized at the end, the not is moved accordingly

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "Note",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", 1);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `End`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(1) = False");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
990
|
How can I hide a bar without removing it
OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 128");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( g2antt , "HeaderVisible", 1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001","B1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 2"),"Task","1/6/2001","1/14/2001","B2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod( items , "AddLink", "L1",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.FindItem(`Item 1`,0)"),"B1",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.FindItem(`Item 2`,0)"),"B2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(FirstVisibleItem,FirstItemBar(FirstVisibleItem),19) = 100");
_ObjectCallMethod( g2antt , "EndUpdate");
|
989
|
How can I align the caption in the note

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "N1",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(1) = False");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `S <b><%dd%></b>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 48");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartAlignment(0) = 0");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVOffset(0) = 17");
note = _ObjectCallMethod( notes , "Add", "N2",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","");
_ObjectSetProperty( note , "RelativePosition", 1);
_ObjectSetProperty( note , "ShowLink", 0);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(1) = False");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `E <b><%dd%></b>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartFixedWidth(0) = 48");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartAlignment(0) = 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVOffset(0) = 17");
_ObjectCallMethod( g2antt , "EndUpdate");
|
988
|
How I can assign a note and let user move the note relative to the bar

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "Note",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","End");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `Day<br> <%dd%>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartCanMove(0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVOffset(0) = 16");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartTransparency(0) = 30");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartToolTip(0) = `Click the note and start moving to a new position.`");
_ObjectCallMethod( g2antt , "EndUpdate");
|
987
|
How can I assign a picture as a note associated with a bar

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "HTMLPicture(`pic1`) = `c:\exontrol\images\zipdisk.gif`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "HTMLPicture(`pic2`) = `c:\exontrol\images\auction.gif`");
_ObjectSetProperty( g2antt , "AntiAliasing", -1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
h = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h,"Task","1/7/2001","1/11/2001","2");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "1",_ObjectCallMethod(g2antt, "ExecuteTemplate", ".Items.ItemByIndex(0)"),"1","<img>pic1</img>");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartShadow(1) = False");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBorderSize(1) = 0");
_ObjectCallMethod( note , "ClearPartBackColor", 1);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(1) = -64");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartCanMove(1) = True");
note = _ObjectCallMethod( notes , "Add", "2",_ObjectCallMethod(g2antt, "ExecuteTemplate", ".Items.ItemByIndex(1)"),"2","<img>pic2</img>");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartShadow(1) = False");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBorderSize(1) = 0");
_ObjectCallMethod( note , "ClearPartBackColor", 1);
_ObjectSetProperty( note , "RelativePosition", 1);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartCanMove(1) = True");
_ObjectSetProperty( note , "LinkColor", 255);
_ObjectSetProperty( note , "LinkWidth", 2);
_ObjectSetProperty( note , "LinkStyle", 2);
_ObjectSetProperty( note , "ShowLink", 1);
_ObjectCallMethod( g2antt , "EndUpdate");
|
986
|
How can I assign a picture as a note associated with a bar

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( g2antt , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
_ObjectSetProperty( g2antt , "AntiAliasing", -1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1");
h = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h,"Task","1/7/2001","1/11/2001","2");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "1",_ObjectCallMethod(g2antt, "ExecuteTemplate", ".Items.ItemByIndex(0)"),"1","<img>1</img>");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartShadow(1) = False");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBorderSize(1) = 0");
_ObjectCallMethod( note , "ClearPartBackColor", 1);
note = _ObjectCallMethod( notes , "Add", "2",_ObjectCallMethod(g2antt, "ExecuteTemplate", ".Items.ItemByIndex(1)"),"2","<img>2</img>...<img>3</img>");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartShadow(1) = False");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartBorderSize(1) = 0");
_ObjectCallMethod( note , "ClearPartBackColor", 1);
_ObjectSetProperty( note , "RelativePosition", 1);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartCanMove(1) = True");
_ObjectSetProperty( note , "LinkColor", 255);
_ObjectSetProperty( note , "LinkWidth", 2);
_ObjectSetProperty( note , "LinkStyle", 2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
985
|
How can I put a box assigned to a DATE

OBJECT g2antt,items,note,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Item 1");
h = _ObjectCallMethod( items , "AddItem", "Item 2");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
note = _ObjectCallMethod( notes , "Add", "D1",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),_ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate"),"Date:<br><%dd%>/<%mm%><br><b><%yyyy%></b>");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim notObj")
_ObjectCallMethod(g2antt, "TemplatePut", note)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartCanMove(1) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVOffset(1) = 20");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(1) = 20");
note = _ObjectCallMethod( notes , "Add", "D2",_ObjectCallMethod(g2antt, "ExecuteTemplate", ".Items.NextVisibleItem(Me.Items.FirstVisibleItem)"),"1/7/2001","Date:<br><%dd%>/<%mm%><br><b><%yyyy%></b>");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVisible(0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartText(0) = `<b><%d%></b>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartCanMove(1) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartVOffset(1) = 20");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "notObj.PartHOffset(1) = 20");
_ObjectCallMethod( g2antt , "EndUpdate");
|
984
|
How can I add a note or a box associated with a bar

OBJECT g2antt,items,notes;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","1","Center");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`1`,44) = `left`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`1`,45) = 16");
h = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h,"Task","1/7/2001","1/11/2001","2","Center");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`2`,44) = `right`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`2`,45) = 18");
notes = _ObjectGetProperty( _ObjectGetProperty( g2antt , "Chart") , "Notes");
_ObjectCallMethod( notes , "Add", "1S",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","Start");
_ObjectSetProperty( _ObjectCallMethod( notes , "Add", "1F",_ObjectGetProperty( _ObjectGetProperty( g2antt , "Items") , "FirstVisibleItem"),"1","End") , "RelativePosition", 1);
_ObjectCallMethod( g2antt , "EndUpdate");
|
983
|
Is it possible to define different working hours for every week day

OBJECT chart,g2antt,items,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 14");
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectSetProperty( chart , "NonworkingHours", 0);
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "LevelCount", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Alignment", 1);
_ObjectSetProperty( level , "Label", "<%dddd%>");
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", "<%hh%>");
_ObjectSetProperty( level , "Count", 6);
_ObjectSetProperty( chart , "UnitWidth", 16);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(h,False) = `weekday(value) != 1 or (weekday(value) = 1 and not ( hour(value) >= 9 and hour(value) <= 14 ))`");
h = _ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(h,False) = `weekday(value) = 2 and ( hour(value) >= 9 and hour(value) <= 14 )`");
h = _ObjectCallMethod( items , "AddItem", 3);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(h,False) = `weekday(value) = 3`");
_ObjectCallMethod( g2antt , "EndUpdate");
|
982
|
How can I automatically update the exBarPercent value using a slider control

OBJECT chart,column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Items") , "AllowCellValueToItemBar", -1);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2002");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 128");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( chart , "Bars") , "Add", "Task%Progress") , "Shortcut", "Percent");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Percent");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim colObj")
_ObjectCallMethod(g2antt, "TemplatePut", column)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(18) = 518");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(19) = `P`");
items = _ObjectGetProperty( g2antt , "Items");
i = _ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,i")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", i)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellBold(i,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellEditor(i,0).EditType = 20");
_ObjectCallMethod( items , "AddBar", i,"Percent","1/2/2002","1/6/2002","P");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(i,`P`,14) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(i,0) = 50");
_ObjectCallMethod( g2antt , "EndUpdate");
|
981
|
Is there any automatic way to change a property for all bars in the chart
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 1"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 2"),"Task","1/2/2001","1/4/2001","K2");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 3"),"Task","1/2/2001","1/4/2001","K3");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 4"),"Task","1/2/2001","1/4/2001","K4");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(0,`<*>`,33) = 255");
|
980
|
How can I assign an icon to a bar and I get notified when I click it

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( g2antt , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/10/2001","","Caption");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,44) = `<a1><img>1:8</img></a><a1><img>2</img></a>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,45) = 16");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,47) = 5");
_ObjectCallMethod( g2antt , "EndUpdate");
|
979
|
How can I assign an icon to a bar so I do not break its caption

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( g2antt , "Images", "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" +
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" +
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" +
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/10/2001","","Caption");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,44) = `<img>1</img>`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,45) = 16");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,47) = 5");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,48) = 2");
_ObjectCallMethod( g2antt , "EndUpdate");
|
978
|
How can I assign multiple lables to the same bar

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","1/5/2001","1/7/2001","","Right");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,``,4) = 18");
_ObjectCallMethod( items , "AddBar", h1,"","1/5/2001","1/5/2001","T1","Left");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,`T1`,4) = 16");
_ObjectCallMethod( items , "AddBar", h1,"","1/5/2001","1/7/2001","T2","Center");
_ObjectCallMethod( items , "GroupBars", h1,"",-1,h1,"T1",-1);
_ObjectCallMethod( items , "GroupBars", h1,"",-1,h1,"T1",0);
_ObjectCallMethod( items , "GroupBars", h1,"",-1,h1,"T2",-1);
_ObjectCallMethod( items , "GroupBars", h1,"",0,h1,"T2",0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
977
|
Is there any way to have more Captions on a bar than one

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","1/5/2001","1/7/2001","","Right");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,``,4) = 18");
_ObjectCallMethod( items , "AddBar", h1,"","1/5/2001","1/5/2001","T1","Left");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,`T1`,4) = 16");
_ObjectCallMethod( items , "GroupBars", h1,"",-1,h1,"T1",-1);
_ObjectCallMethod( items , "GroupBars", h1,"",-1,h1,"T1",0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
976
|
How can I assign multiple lables to the same bar at once

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/5/2001","1/8/2001","","Center");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,44) = `left`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,45) = 16");
h = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h,"Task","1/7/2001","1/11/2001","","Center");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,44) = `right`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,45) = 18");
_ObjectCallMethod( g2antt , "EndUpdate");
|
975
|
How can I limit the duration or length of the bar
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.ScrollRange(0) = #1/1/2001#");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.ScrollRange(1) = #1/7/2001#");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(0) = 128");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/5/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,36) = 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,37) = 5");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,3) = `Min=2 / Max=5`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,4) = 18");
_ObjectCallMethod( g2antt , "EndUpdate");
|
974
|
I have an EBN file how can I apply different colors to it, so no need to create a new one

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "VisualAppearance") , "Add", 1,"c:\exontrol\images\normal.ebn");
_ObjectSetProperty( g2antt , "SelBackColor", _ObjectGetProperty( g2antt , "BackColor"));
_ObjectSetProperty( g2antt , "SelForeColor", _ObjectGetProperty( g2antt , "ForeColor"));
_ObjectSetProperty( g2antt , "HasLines", 0);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Default");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Root");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Default");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", hC)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 16777216");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Light Green");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", hC)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 16842496");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.Me.Chart.ItemBackColor(hC) = 16842496");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Dark Green");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", hC)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 16809728");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Magenta");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", hC)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 33521663");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
hC = _ObjectCallMethod( items , "InsertItem", h,"","Yellow");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,hC")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", hC)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBackColor(hC) = 25165823");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemHeight(InsertItem(h,,``)) = 6");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
973
|
I need to specify the non-working hours for about 100 days for each item, but the scrolling is very slow. Is there any option to increase the speed

OBJECT chart,g2antt,items,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "AllowChartScrollPage", -1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Non-Work");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "4/4/2009 4:00:00 PM");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 52");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "UnitWidth", 16);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Label", "<r><%d%>-<%mmm%>");
_ObjectSetProperty( level , "Unit", 4096);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", "<%hh%>");
_ObjectSetProperty( level , "Unit", 65536);
_ObjectSetProperty( level , "Count", 2);
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddItem", "Default");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(AddItem(`Test`),False) = `date(shortdate(value)) case(default:0;#4/5/2009# : hour(value) >= 6 and hour(value) <= 12; #4/6/2009# : hour(value) >= 6 and hour(value) <= 12; #4/7/2009# : hour(value) >= 6 and hour(value) <= 12; #4/8/2009# : hour(value) >= 6 and hour(value) <= 12; #4/9/2009# : hour(value) >= 6 and hour(value) <= 12; #4/10/2009# : hour(value) >= 6 and hour(value) <= 12; #4/11/2009# : hour(value) >= 6 and hour(value) <= 12; #4/12/2009# : hour(value) >= 6 and hour(value) <= 12; #4/13/2009# : hour(value) >= 6 and hour(value) <= 12; #4/14/2009# : hour(value) >= 6 and hour(value) <= 12; #4/15/2009# : hour(value) >= 6 and hour(value) <= 12; #4/16/2009# : hour(value) >= 6 and hour(value) <= 12; #4/17/2009# : hour(value) >= 6 and hour(value) <= 12; #4/18/2009# : hour(value) >= 6 and hour(value) <= 12; #4/19/2009# : hour(value) >= 6 and hour(value) <= 12; #4/20/2009# : hour(value) >= 6 and hour(value) <= 12; #4/21/2009# : hour(value) >= 6 and hour(value) <= 12; #4/22/2009# : hour(value) >= 6 and hour(value) <= 12; #4/23/2009# : hour(value) >= 6 and hour(value) <= 12; #4/24/2009# : hour(value) >= 6 and hour(value) <= 12; #4/25/2009# : hour(value) >= 6 and hour(value) <= 12; #4/26/2009# : hour(value) >= 6 and hour(value) <= 12; #4/27/2009# : hour(value) >= 6 and hour(value) <= 12; #4/28/2009# : hour(value) >= 6 and hour(value) <= 12; #4/29/2009# : hour(value) >= 6 and hour(value) <= 12; #4/30/2009# : hour(value) >= 6 and hour(value) <= 12; #5/1/2009# : hour(value) >= 6 and hour(value) <= 12; #5/2/2009# : hour(value) >= 6 and hour(value) <= 12; #5/3/2009# : hour(value) >= 6 and hour(value) <= 12; #5/4/2009# : hour(value) >= 6 and hour(value) <= 12; #5/5/2009# : hour(value) >= 6 and hour(value) <= 12; #5/6/2009# : hour(value) >= 6 and hour(value) <= 12; #5/7/2009# : hour(value) >= 6 and hour(value) <= 12; #5/8/2009# : hour(value) >= 6 and hour(value) <= 12; #5/9/2009# : hour(value) >= 6 and hour(value) <= 12; #5/10/2009# : hour(value) >= 6 and hour(value) <= 12; #5/11/2009# : hour(value) >= 6 and hour(value) <= 12; #5/13/2009# : hour(value) >= 6 and hour(value) <= 12; #5/14/2009# : hour(value) >= 6 and hour(value) <= 12; #5/15/2009# : hour(value) >= 6 and hour(value) <= 12; #5/16/2009# : hour(value) >= 6 and hour(value) <= 12; #5/17/2009# : hour(value) >= 6 and hour(value) <= 12; #5/18/2009# : hour(value) >= 6 and hour(value) <= 12; #5/19/2009# : hour(value) >= 6 and hour(value) <= 12; #5/20/2009# : hour(value) >= 6 and hour(value) <= 12; #5/21/2009# : hour(value) >= 6 and hour(value) <= 12; #5/22/2009# : hour(value) >= 6 and hour(value) <= 12; #5/23/2009# : hour(value) >= 6 and hour(value) <= 12; #5/24/2009# : hour(value) >= 6 and hour(value) <= 12; #5/25/2009# : hour(value) >= 6 and hour(value) <= 12; #5/26/2009# : hour(value) >= 6 and hour(value) <= 12; #5/27/2009# : hour(value) >= 6 and hour(value) <= 12; #5/28/2009# : hour(value) >= 6 and hour(value) <= 12; #5/29/2009# : hour(value) >= 6 and hour(value) <= 12; #5/30/2009# : hour(value) >= 6 and hour(value) <= 12; #5/31/2009# : hour(value) >= 6 and hour(value) <= 12; #6/1/2009# : hour(value) >= 6 and hour(value) <= 12; #6/2/2009# : hour(value) >= 6 and hour(value) <= 12; #6/3/2009# : hour(value) >= 6 and hour(value) <= 12; #6/4/2009# : hour(value) >= 6 and hour(value) <= 12; #6/5/2009# : hour(value) >= 6 and hour(value) <= 12; #6/6/2009# : hour(value) >= 6 and hour(value) <= 12; #6/7/2009# : hour(value) >= 6 and hour(value) <= 12; #6/8/2009# : hour(value) >= 6 and hour(value) <= 12; #6/9/2009# : hour(value) >= 6 and hour(value) <= 12; #6/10/2009# : hour(value) >= 6 and hour(value) <= 12; #6/11/2009# : hour(value) >= 6 and hour(value) <= 12; #6/12/2009# : hour(value) >= 6 and hour(value) <= 12; #6/13/2009# : hour(value) >= 6 and hour(value) <= 12; #6/14/2009# : hour(value) >= 6 and hour(value) <= 12; #6/15/2009# : hour(value) >= 6 and hour(value) <= 12; #6/16/2009# : hour(value) >= 6 and hour(value) <= 12; #6/17/2009# : hour(value) >= 6 and hour(value) <= 12; #6/18/2009# : hour(value) >= 6 and hour(value) <= 12; #6/19/2009# : hour(value) >= 6 and hour(value) <= 12; #6/21/2009# : hour(value) >= 6 and hour(value) <= 12; #6/22/2009# : hour(value) >= 6 and hour(value) <= 12; #6/23/2009# : hour(value) >= 6 and hour(value) <= 12; #6/24/2009# : hour(value) >= 6 and hour(value) <= 12; #6/25/2009# : hour(value) >= 6 and hour(value) <= 12; #6/26/2009# : hour(value) >= 6 and hour(value) <= 12; #6/27/2009# : hour(value) >= 6 and hour(value) <= 12; #6/28/2009# : hour(value) >= 6 and hour(value) <= 12; #6/29/2009# : hour(value) >= 6 and hour(value) <= 12; #6/30/2009# : hour(value) >= 6 and hour(value) <= 12; #7/1/2009# : hour(value) >= 6 and hour(value) <= 12; #7/2/2009# : hour(value) >= 6 and hour(value) <= 12; #7/3/2009# : hour(value) >= 6 and hour(value) <= 12; #7/4/2009# : hour(value) >= 6 and hour(value) <= 12; #7/5/2009# : hour(value) >= 6 and hour(value) <= 12; #7/6/2009# : hour(value) >= 6 and hour(value) <= 12; #7/7/2009# : hour(value) >= 6 and hour(value) <= 12; #7/8/2009# : hour(value) >= 6 and hour(value) <= 12; #7/9/2009# : hour(value) >= 6 and hour(value) <= 12; #7/10/2009# : hour(value) >= 6 and hour(value) <= 12; #7/11/2009# : hour(value) >= 6 and hour(value) <= 12; #7/12/2009# : hour(value) >= 6 and hour(value) <= 12; #7/13/2009# : hour(value) >= 6 and hour(value) <= 12; #7/14/2009# : hour(value) >= 6 and hour(value) <= 12)`");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(AddItem(`Test`),False) = `date(shortdate(value)) case(default:0;#4/5/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/6/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/7/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/8/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/9/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/10/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/11/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/12/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/13/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/14/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/15/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/16/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/17/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/18/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/19/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/20/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/21/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/22/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/23/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/24/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/25/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/26/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/27/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/28/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/29/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #4/30/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/1/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/2/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/3/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/4/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/5/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/6/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/7/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/8/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/9/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/10/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/11/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/13/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/14/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/15/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/16/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/17/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/18/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/19/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/20/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/21/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/22/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/23/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/24/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/25/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/26/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/27/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/28/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/29/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/30/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #5/31/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/1/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/2/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/3/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/4/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/5/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/6/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/7/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/8/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/9/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/10/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/11/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/12/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/13/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/14/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/15/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/16/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/17/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/18/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/19/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/21/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/22/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/23/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/24/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/25/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/26/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/27/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/28/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/29/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #6/30/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/1/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/2/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/3/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/4/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/5/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/6/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/7/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/8/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/9/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/10/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/11/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/12/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/13/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21); #7/14/2009# : hour(value) >= 6 and hour(value) <= 10 or hour(value) in (16,17,20,21))`");
_ObjectCallMethod( items , "AddItem", "Default");
_ObjectCallMethod( g2antt , "EndUpdate");
|
972
|
How can I use the CASE statement (CASE usage)
OBJECT column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Value");
_ObjectSetProperty( column , "Width", 24);
_ObjectSetProperty( _ObjectGetProperty( column , "Editor") , "EditType", 4);
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "CASE - statment");
_ObjectSetProperty( column , "ComputedField", "%0 case (default:'not found';1:%0;2:2*%0;3:3*%0;4:4*%0;5:5*%0;7:'Seven';8:'Eight';9:'Nine';11:'Eleven';13:'Thirtheen';14:'Fourt" +
"heen')");
_ObjectSetProperty( column , "ToolTip", _ObjectGetProperty( column , "ComputedField"));
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
971
|
How can I use the CASE statement (CASE usage)
OBJECT column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Value");
_ObjectSetProperty( column , "Width", 24);
_ObjectSetProperty( _ObjectGetProperty( column , "Editor") , "EditType", 4);
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "CASE - statment");
_ObjectSetProperty( column , "ComputedField", "%0 case (default:'not found';1:'One';2:'Two';3:'Three';4:'Four';5:'Five';7:'Seven';8:'Eight';9:'Nine';11:'Eleven';13:'Thirtheen" +
"';14:'Fourtheen')");
_ObjectSetProperty( column , "ToolTip", _ObjectGetProperty( column , "ComputedField"));
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
970
|
I have seen the IN function but it returns -1 or 0. How can I display the value being found ( SWITCH usage )
OBJECT column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Value");
_ObjectSetProperty( column , "Width", 24);
_ObjectSetProperty( _ObjectGetProperty( column , "Editor") , "EditType", 4);
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "SWITCH - statment");
_ObjectSetProperty( column , "ComputedField", "%0 switch ('not found', 1,2,3,4,5,7,8,9,11,13,14)");
_ObjectSetProperty( column , "ToolTip", _ObjectGetProperty( column , "ComputedField"));
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
969
|
I have a large collection of constant values and using or operator is a time consuming (IN usage). Is there any way to increase the speed to check if a value maches the collection
OBJECT column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Value");
_ObjectSetProperty( column , "Width", 24);
_ObjectSetProperty( _ObjectGetProperty( column , "Editor") , "EditType", 4);
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "IN - statment");
_ObjectSetProperty( column , "ComputedField", "%0 in (1,2,3,4,5,7,8,9,11,13,14) ? 'found' : ''");
_ObjectSetProperty( column , "ToolTip", _ObjectGetProperty( column , "ComputedField"));
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod( items , "AddItem", 1);
_ObjectCallMethod( items , "AddItem", 2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
968
|
How can I automatically update the exBarPercent value using a slider control

OBJECT chart,column,editor,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Items") , "AllowCellValueToItemBar", -1);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2002");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 128");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( chart , "Bars") , "Add", "Task%Progress") , "Shortcut", "Percent");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Percent");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim colObj")
_ObjectCallMethod(g2antt, "TemplatePut", column)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(18) = 12");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(19) = `P`");
items = _ObjectGetProperty( g2antt , "Items");
i = _ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,i")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", i)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellBold(i,0) = True");
editor = _ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellEditor(i,0)");
_ObjectSetProperty( editor , "EditType", 20);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim ediObj")
_ObjectCallMethod(g2antt, "TemplatePut", editor)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "ediObj.Option(42) = 0.01");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "ediObj.Option(40) = 0.01");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "ediObj.Option(44) = 1");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "ediObj.Option(41) = -100");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,i")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", i)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValueFormat(i,0) = 1");
_ObjectCallMethod( items , "AddBar", i,"Percent","1/2/2002","1/6/2002","P");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(i,`P`,14) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(i,0) = 0.5");
_ObjectCallMethod( g2antt , "EndUpdate");
|
967
|
How can I automatically update the exBarPercent value using a spin control

OBJECT chart,column,editor,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Items") , "AllowCellValueToItemBar", -1);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2002");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 128");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( chart , "Bars") , "Add", "Task%Progress") , "Shortcut", "Percent");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Percent");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim colObj")
_ObjectCallMethod(g2antt, "TemplatePut", column)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(18) = 12");
_ObjectSetProperty( column , "FormatColumn", "((0:=round(dbl(%0)*100)) >= 50 ? '<font 8>'+ =:0 + '%</font>' : '<fgcolor=808080><font 6>'+ =:0 + '%</font></fgcolor>')");
items = _ObjectGetProperty( g2antt , "Items");
i = _ObjectCallMethod( items , "AddItem", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,i")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", i)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellBold(i,0) = True");
editor = _ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellEditor(i,0)");
_ObjectSetProperty( editor , "EditType", 4);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim ediObj")
_ObjectCallMethod(g2antt, "TemplatePut", editor)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "ediObj.Option(40) = 0.01");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "ediObj.Option(44) = 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,i")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", i)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValueFormat(i,0) = 1");
_ObjectCallMethod( items , "AddBar", i,"Percent","1/2/2002","1/6/2002");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(i,0) = 0.5");
_ObjectCallMethod( g2antt , "EndUpdate");
|
966
|
How do I specify for an item all units as being non-working units

OBJECT chart,g2antt,items,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "AllowChartScrollPage", -1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Non-Work");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "AllowCreateBar", 1);
_ObjectSetProperty( chart , "FirstVisibleDate", "4/3/2009 10:00:00 AM");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 64");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "UnitWidth", 16);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Label", "<r><%d%>-<%mmm%>");
_ObjectSetProperty( level , "Unit", 4096);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", "<%hh%>");
_ObjectSetProperty( level , "Unit", 65536);
_ObjectSetProperty( level , "Count", 2);
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddItem", "Default");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(AddItem(`All-Non-Working`),False) = `1`");
_ObjectCallMethod( items , "AddItem", "Default");
_ObjectCallMethod( g2antt , "EndUpdate");
|
965
|
How do I specify for an item all units as being working units

OBJECT chart,g2antt,items,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "AllowChartScrollPage", -1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Non-Work");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "AllowCreateBar", 1);
_ObjectSetProperty( chart , "FirstVisibleDate", "4/3/2009 10:00:00 AM");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 64");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "UnitWidth", 16);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Label", "<r><%d%>-<%mmm%>");
_ObjectSetProperty( level , "Unit", 4096);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", "<%hh%>");
_ObjectSetProperty( level , "Unit", 65536);
_ObjectSetProperty( level , "Count", 2);
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddItem", "Default");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(AddItem(`All-Working`),False) = `0`");
_ObjectCallMethod( items , "AddItem", "Default");
_ObjectCallMethod( g2antt , "EndUpdate");
|
964
|
How can I programmatically specify different non-working units ( days, hours ) for different items

OBJECT chart,g2antt,items,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "AllowChartScrollPage", -1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Non-Work");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "AllowCreateBar", 1);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( chart , "Bars") , "Add", "Task:Split") , "Shortcut", "Task");
_ObjectSetProperty( chart , "FirstVisibleDate", "7/13/2009 12:00:00 PM");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 52");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "UnitWidth", 16);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Label", "<r><b><%d%></b> <%mmm%> <%yyyy%>");
_ObjectSetProperty( level , "Unit", 4096);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", "<%hh%>");
_ObjectSetProperty( level , "Unit", 65536);
_ObjectSetProperty( level , "Count", 2);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Item 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(h,False) = `(shortdate(value) = #7/14/2009# and hour(value) >= 6 and hour(value) <= 12)`");
_ObjectCallMethod( items , "AddBar", h,"Task","7/14/2009 4:00:00 AM","7/14/2009 2:00:00 PM");
h = _ObjectCallMethod( items , "AddItem", "Item 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemNonworkingUnits(h,False) = `(((hour(value) >= 4 and hour(value) <= 16) or hour(value) = 2) and month(value) = 7) or ((hour(value) >= 2 and hour(value) < 10)) and month(value) = 6 or weekday(value) = 6`");
_ObjectCallMethod( items , "AddBar", h,"Task","7/14/2009 1:00:00 AM","7/14/2009 6:00:00 AM");
_ObjectCallMethod( g2antt , "EndUpdate");
|
963
|
I am programmatically select a date using the Chart.SelectDate property, but can't see why the date is not highlighted. What am I doing wrong
OBJECT chart,g2antt;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "SelectLevel", 1);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.SelectDate(#1/4/2001#) = True");
|
962
|
How do I show a shorter line in the chart's level

OBJECT chart,g2antt,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "GridLineColor", 8421504);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "DrawLevelSeparator", 0);
_ObjectSetProperty( chart , "UnitWidth", 24);
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 0");
_ObjectSetProperty( chart , "LevelCount", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Alignment", 1);
_ObjectSetProperty( level , "Label", "<%dddd%>");
_ObjectSetProperty( level , "DrawTickLines", 18);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", 65536);
_ObjectSetProperty( level , "Count", 6);
_ObjectSetProperty( level , "DrawTickLines", 578);
_ObjectCallMethod( level , "DrawTickLinesFrom", 0,34);
_ObjectCallMethod( g2antt , "EndUpdate");
|
961
|
How do I replicate the screen shot http://www.exontrol.com/images/exg2antt9.jpg

OBJECT appearance,bar,chart,column,columns,g2antt,items,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
appearance = _ObjectGetProperty( g2antt , "VisualAppearance");
_ObjectCallMethod( appearance , "Add", 1,"C:\Program Files\Exontrol\ExG2antt.NET\Sample\EBN\headdark.ebn");
_ObjectCallMethod( appearance , "Add", 2,"C:\Program Files\Exontrol\ExG2antt.NET\Sample\EBN\xpbsel.ebn");
_ObjectCallMethod( appearance , "Add", 3,"C:\Program Files\Exontrol\ExG2antt.NET\Sample\EBN\headligh.ebn");
_ObjectCallMethod( appearance , "Add", 4,"CP:1 0 0 1 1");
_ObjectSetProperty( g2antt , "BackColorHeader", 67108864);
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "BackColorLevelHeader", 67108864);
_ObjectSetProperty( g2antt , "SelBackColor", 33554687);
_ObjectSetProperty( g2antt , "GridLineColor", 8421504);
_ObjectSetProperty( g2antt , "HeaderHeight", 22);
_ObjectSetProperty( g2antt , "SelForeColor", 0);
_ObjectSetProperty( g2antt , "MarkSearchColumn", 0);
_ObjectSetProperty( g2antt , "ScrollBySingleLine", 0);
_ObjectSetProperty( g2antt , "ShowFocusRect", 0);
_ObjectSetProperty( g2antt , "DefaultItemHeight", 48);
columns = _ObjectGetProperty( g2antt , "Columns");
column = _ObjectCallMethod( columns , "Add", "Group");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim colObj")
_ObjectCallMethod(g2antt, "TemplatePut", column)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(4) = 50331648");
_ObjectSetProperty( column , "LevelKey", 1);
column = _ObjectCallMethod( columns , "Add", "Histogram");
_ObjectSetProperty( column , "Width", 18);
_ObjectSetProperty( column , "AllowSizing", 0);
_ObjectSetProperty( column , "LevelKey", 1);
_ObjectSetProperty( column , "Position", 0);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/11/2009");
_ObjectSetProperty( chart , "DrawGridLines", -1);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 96");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "DrawLevelSeparator", 0);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Label", "<%mmmm%> <%yyyy%>");
_ObjectSetProperty( level , "Unit", 16);
_ObjectSetProperty( level , "Alignment", 1);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "FormatLabel", "weekday(dvalue)=1?value:''");
_ObjectSetProperty( level , "DrawTickLines", 18);
_ObjectCallMethod( level , "DrawTickLinesFrom", 0,2);
_ObjectSetProperty( level , "Alignment", 1);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "Color", 33554432);
_ObjectSetProperty( bar , "Height", 18);
_ObjectSetProperty( bar , "OverlaidType", 515);
_ObjectSetProperty( bar , "HistogramColor", 16777216);
_ObjectSetProperty( bar , "HistogramType", 1);
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 48);
_ObjectSetProperty( chart , "HistogramView", 4);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Group <b>A</b>");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValueFormat(h,0) = 1");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellMerge(h,0) = 1");
_ObjectCallMethod( items , "AddBar", h,"Task","6/12/2009","6/19/2009","K1","Requirements");
_ObjectCallMethod( items , "AddBar", h,"Task","6/13/2009","6/21/2009","K2","Sales & Marketing");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K1`,33) = 255");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K2`,33) = 255");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
h = _ObjectCallMethod( items , "AddItem", "Group <b>B</b>");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValueFormat(h,0) = 1");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellMerge(h,0) = 1");
_ObjectCallMethod( items , "AddBar", h,"Task","6/14/2009","6/23/2009","K1","<b>GUI</b> Design");
_ObjectCallMethod( items , "AddBar", h,"Task","6/18/2009","6/25/2009","K2","Class Design");
h = _ObjectCallMethod( items , "AddItem", "Group <b>C</b>");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValueFormat(h,0) = 1");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellMerge(h,0) = 1");
_ObjectCallMethod( items , "AddBar", h,"Task","6/12/2009","6/19/2009","K1","<b>GUI</b> Coding");
_ObjectCallMethod( items , "AddBar", h,"Task","6/13/2009","6/25/2009","K2","Design & Concept");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K1`,33) = 65280");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K2`,33) = 65280");
_ObjectCallMethod( g2antt , "EndUpdate");
|
960
|
How can I remove all bars from the chart
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 1"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 2"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 3"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 4"),"Task","1/2/2001","1/4/2001","K2");
_ObjectCallMethod( items , "ClearBars", 0);
|
959
|
How can I change the color for all bars with a specified key
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 1"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 2"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 3"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 4"),"Task","1/2/2001","1/4/2001","K2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(0,`K1`,33) = 255");
|
958
|
Is there any automatic way to change a property for all bars with a specified key
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 1"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 2"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 3"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 4"),"Task","1/2/2001","1/4/2001","K2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(0,`K1`,33) = 255");
|
957
|
How can I remove all bars with specified key
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 1"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 2"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 3"),"Task","1/2/2001","1/4/2001","K1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Task 4"),"Task","1/2/2001","1/4/2001","K2");
_ObjectCallMethod( items , "RemoveBar", 0,"K1");
|
956
|
How do I several bars with different vertical offsets

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Item");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemHeight(h) = 62");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/4/2001","T1");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`T1`,18) = -23");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/4/2001","T2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`T2`,18) = -11");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/4/2001","T3");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`T3`,18) = 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/4/2001","T4");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`T4`,18) = 13");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/4/2001","T5");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`T5`,18) = 25");
|
955
|
Is there any option to show gradient bars without using EBN technology

OBJECT bar,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "Color", 255);
_ObjectSetProperty( bar , "StartColor", 65280);
_ObjectSetProperty( bar , "EndColor", 65535);
_ObjectSetProperty( bar , "Pattern", 32);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/5/2001","");
|
954
|
How can I define a bar with border and solid filling

OBJECT bar,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "Color", 255);
_ObjectSetProperty( bar , "StartColor", 65535);
_ObjectSetProperty( bar , "EndColor", 65535);
_ObjectSetProperty( bar , "Pattern", 32);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/5/2001","");
|
953
|
How can I define a bar with border and solid filling

OBJECT bar,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "Color", 255);
_ObjectSetProperty( bar , "Pattern", 32);
_ObjectSetProperty( bar , "Height", 18);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/5/2001","");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,7) = 65535");
|
952
|
How do I define a bar with solid border and filling

OBJECT bar,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "VisualAppearance") , "Add", 1,"C:\Program Files\Exontrol\ExG2antt.NET\sample\EBN\blackboxt.ebn");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "Color", 16777216);
_ObjectSetProperty( bar , "Height", 18);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/5/2001","");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,33) = 255");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,``,7) = 65535");
|
951
|
Can I control the units/resource/effort being allocated to a bar when displaying OverAllocation histogram

OBJECT bar,chart,column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Effort");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim colObj")
_ObjectCallMethod(g2antt, "TemplatePut", column)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(18) = 21");
_ObjectSetProperty( _ObjectGetProperty( column , "Editor") , "EditType", 4);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 96");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 202);
_ObjectSetProperty( chart , "HistogramView", 112);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 2050);
_ObjectSetProperty( bar , "HistogramType", 1);
_ObjectSetProperty( bar , "HistogramCriticalValue", 50);
_ObjectSetProperty( bar , "HistogramGridLinesColor", 12632256);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 65536);
items = _ObjectGetProperty( g2antt , "Items");
_ObjectSetProperty( items , "AllowCellValueToItemBar", -1);
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/25/2005");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = 2");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/24/2005","6/28/2005");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = 1");
h1 = _ObjectCallMethod( items , "AddItem", "Task 3");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/27/2005","7/1/2005");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = 2");
h1 = _ObjectCallMethod( items , "AddItem", "Task 4");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/30/2005","7/2/2005");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = 1");
_ObjectCallMethod( g2antt , "EndUpdate");
|
950
|
Can I control the units/resource/effort being allocated to a bar when displaying Overload histogram

OBJECT bar,chart,column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Effort");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim colObj")
_ObjectCallMethod(g2antt, "TemplatePut", column)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(18) = 21");
_ObjectSetProperty( _ObjectGetProperty( column , "Editor") , "EditType", 4);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 96");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 128);
_ObjectSetProperty( chart , "HistogramView", 112);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", _ObjectGetProperty( bar , "Pattern"));
_ObjectSetProperty( bar , "HistogramType", 0);
_ObjectSetProperty( bar , "HistogramCriticalValue", 3);
_ObjectSetProperty( bar , "ShowHistogramValues", "value>3?255:1");
_ObjectSetProperty( bar , "HistogramItems", -11);
_ObjectSetProperty( bar , "HistogramGridLinesColor", 12632256);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 65536);
items = _ObjectGetProperty( g2antt , "Items");
_ObjectSetProperty( items , "AllowCellValueToItemBar", -1);
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/23/2005");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = 4");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/24/2005","6/26/2005");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = 3");
h1 = _ObjectCallMethod( items , "AddItem", "Task 3");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/27/2005","6/29/2005");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = 2");
h1 = _ObjectCallMethod( items , "AddItem", "Task 4");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/30/2005","7/2/2005");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = 1");
_ObjectCallMethod( g2antt , "EndUpdate");
|
949
|
How can I display double-lines curves in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectSetProperty( g2antt , "AntiAliasing", -1);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 48");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 512);
_ObjectSetProperty( bar , "HistogramItems", 3);
_ObjectSetProperty( bar , "HistogramBorderColor", 128);
_ObjectSetProperty( bar , "HistogramColor", 255);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 2"),"Task","1/3/2001","1/7/2001");
|
948
|
Is there any option to display values in the histogram using different colors

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 6);
_ObjectSetProperty( bar , "HistogramItems", 6);
_ObjectSetProperty( bar , "ShowHistogramValues", "value>1?255:65280");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/3/2001","1/7/2001");
|
947
|
Is there any option to display values in the histogram using different colors

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 6);
_ObjectSetProperty( bar , "HistogramItems", 6);
_ObjectSetProperty( bar , "ShowHistogramValues", "value>1?255:1");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/3/2001","1/7/2001");
|
946
|
How can I display only few values in the histogram, such as the values greater than a value

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 6);
_ObjectSetProperty( bar , "ShowHistogramValues", "value>1");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/3/2001","1/7/2001");
|
945
|
How can I display values in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 6);
_ObjectSetProperty( bar , "ShowHistogramValues", "1");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/3/2001","1/7/2001");
|
944
|
How can I scroll the chart to find a bar
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "LevelCount", 2);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(0) = 64");
_ObjectSetProperty( g2antt , "DefaultItemHeight", 32);
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001",1);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 2"),"Task","1/2/2001","1/4/2001",2);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 3"),"Task","1/2/2001","1/4/2001",3);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 4"),"Task","1/2/2001","1/4/2001",4);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 5"),"Task","1/2/2001","1/4/2001",5);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 6"),"Task","1/2/2001","1/4/2001",6);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 7"),"Task","1/2/2001","1/4/2001",7);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 8"),"Task","1/2/2001","1/4/2001",8);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 9"),"Task","1/2/2001","1/4/2001",8);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 10"),"Task","1/2/2001","1/4/2001",10);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 11"),"Task","1/2/2001","1/4/2001",11);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 12"),"Task","1/2/2001","1/4/2001",12);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 13"),"Task","1/2/2001","1/4/2001",13);
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 14"),"Task","1/2/2001","1/4/2001",14);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim _ObObj")
_ObjectCallMethod(g2antt, "TemplatePut", _ObjectGetProperty( g2antt , "Items"))
h = _ObjectCallMethod(g2antt, "ExecuteTemplate", "_ObObj.FindBar(14)");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Items") , "EnsureVisibleItem", h);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim h")
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Chart") , "ScrollTo", _ObjectCallMethod(g2antt, "ExecuteTemplate", ".Items.ItemBar(h,14,1)"),1);
|
943
|
Can I change the color/marker/frame for selected bars

OBJECT appearance,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
appearance = _ObjectGetProperty( g2antt , "VisualAppearance");
_ObjectCallMethod( appearance , "Add", 2,"c:\exontrol\images\normal.ebn");
_ObjectCallMethod( appearance , "Add", 1,"CP:2 3 2 -3 -2");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2002");
_ObjectSetProperty( chart , "SelBarColor", 16777216);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 48");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2002","1/4/2002","A");
_ObjectCallMethod( items , "AddBar", h,"Task","1/6/2002","1/10/2002","B");
_ObjectCallMethod( items , "AddBar", h,"Task","1/11/2002","1/14/2002","C");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`A`,257) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`B`,257) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
942
|
Can I display a larger marker for selected bars, eventually using the EBN technology

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "VisualAppearance") , "Add", 1,"c:\exontrol\images\normal.ebn");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2002");
_ObjectSetProperty( chart , "SelBarColor", 16777216);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 48");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2002","1/4/2002","A");
_ObjectCallMethod( items , "AddBar", h,"Task","1/6/2002","1/10/2002","B");
_ObjectCallMethod( items , "AddBar", h,"Task","1/11/2002","1/14/2002","C");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`A`,257) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`B`,257) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
941
|
How do I change the color for the selected bars

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "Debug", -1);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2002");
_ObjectSetProperty( chart , "SelBarColor", 255);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 48");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2002","1/4/2002","A");
_ObjectCallMethod( items , "AddBar", h,"Task","1/6/2002","1/10/2002","B");
_ObjectCallMethod( items , "AddBar", h,"Task","1/11/2002","1/14/2002","C");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`A`,257) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`B`,257) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
940
|
How can I change the background color for child bars of a summary bar

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "LinesAtRoot", -1);
_ObjectSetProperty( g2antt , "HasLines", 0);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "AllowCreateBar", 0);
_ObjectSetProperty( chart , "AllowLinkBars", 0);
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2008");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 112");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "");
items = _ObjectGetProperty( g2antt , "Items");
hR1 = _ObjectCallMethod( items , "AddItem", "Team 1");
_ObjectCallMethod( items , "AddBar", hR1,"Summary","1/2/2008","1/8/2008","");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,hR1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", hR1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(hR1,``,34) = 12895428");
h1 = _ObjectCallMethod( items , "InsertItem", hR1,"","Member 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","1/2/2008","1/7/2008");
_ObjectCallMethod( items , "DefineSummaryBars", hR1,"",h1,"");
h1 = _ObjectCallMethod( items , "InsertItem", hR1,"","Member 2");
_ObjectCallMethod( items , "AddBar", h1,"Task","1/4/2008","1/9/2008");
_ObjectCallMethod( items , "DefineSummaryBars", hR1,"",h1,"");
h1 = _ObjectCallMethod( items , "InsertItem", hR1,"","Member 3");
_ObjectCallMethod( items , "AddBar", h1,"Task","1/5/2008","1/10/2008");
_ObjectCallMethod( items , "DefineSummaryBars", hR1,"",h1,"");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(hR1) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
939
|
How can I allow resizing the bar only in the right part of the bar
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/6/2001","K1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K1`,10) = 2");
|
938
|
How can I allow resizing the bar only in the left part of the bar
OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Task");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h,"Task","1/2/2001","1/6/2001","K1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h,`K1`,10) = 1");
|
937
|
How can I show the links that starts from selected bar being more visible, while the rest being transparent

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "9/20/2006");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 64");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.ShowLinksWidth(1) = 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.ShowLinksStyle(1) = 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.ShowLinksColor(2) = 13158600");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.ShowLinksColor(4) = 13158600");
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","9/21/2006","9/23/2006");
h2 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h2,"Task","9/25/2006","9/27/2006");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h2")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h2)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h2,``,257) = True");
_ObjectCallMethod( items , "AddLink", "L1",h1,"",h2,"");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.Link(`L1`,12) = `L1`");
h3 = _ObjectCallMethod( items , "AddItem", "Task 3");
_ObjectCallMethod( items , "AddBar", h3,"Task","9/29/2006","10/2/2006");
_ObjectCallMethod( items , "AddLink", "L2",h2,"",h3,"");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.Link(`L2`,12) = `L2`");
_ObjectCallMethod( g2antt , "EndUpdate");
|
936
|
How can I show only the links that starts from selected bar

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "MarkSearchColumn", 0);
_ObjectSetProperty( g2antt , "OnResizeControl", 1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Start") , "Visible", 0);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "End") , "Visible", 0);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "9/20/2006");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 64");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.ShowLinksColor(2) = BackColor");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.ShowLinksColor(4) = BackColor");
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = #9/21/2006#");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,2) = #9/24/2006#");
_ObjectCallMethod( items , "AddBar", h1,"Task",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1)"),_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,2)"));
h2 = _ObjectCallMethod( items , "InsertItem", h,"","Task 2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h2")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h2)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h2,1) = #9/25/2006#");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h2,2) = #9/28/2006#");
_ObjectCallMethod( items , "AddBar", h2,"Task",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h2,1)"),_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h2,2)"));
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h2,``,257) = True");
_ObjectCallMethod( items , "AddLink", "L1",h1,"",h2,"");
h3 = _ObjectCallMethod( items , "InsertItem", h,"","Task 3");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h3")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h3)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h3,1) = #9/29/2006#");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h3,2) = #10/2/2006#");
_ObjectCallMethod( items , "AddBar", h3,"Task",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h3,1)"),_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h3,2)"));
_ObjectCallMethod( items , "AddLink", "L2",h2,"",h3,"");
_ObjectCallMethod( g2antt , "EndUpdate");
|
935
|
How can I hide links that are not related to selected bar

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "MarkSearchColumn", 0);
_ObjectSetProperty( g2antt , "OnResizeControl", 1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Start") , "Visible", 0);
_ObjectSetProperty( _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "End") , "Visible", 0);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "9/20/2006");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 64");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.ShowLinksColor(4) = BackColor");
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1) = #9/21/2006#");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,2) = #9/24/2006#");
_ObjectCallMethod( items , "AddBar", h1,"Task",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,1)"),_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h1,2)"));
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,``,257) = True");
h2 = _ObjectCallMethod( items , "InsertItem", h,"","Task 2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h2")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h2)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h2,1) = #9/25/2006#");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h2,2) = #9/28/2006#");
_ObjectCallMethod( items , "AddBar", h2,"Task",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h2,1)"),_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h2,2)"));
_ObjectCallMethod( items , "AddLink", "L1",h1,"",h2,"");
h3 = _ObjectCallMethod( items , "InsertItem", h,"","Task 3");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h3")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h3)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h3,1) = #9/29/2006#");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h3,2) = #10/2/2006#");
_ObjectCallMethod( items , "AddBar", h3,"Task",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h3,1)"),_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellValue(h3,2)"));
_ObjectCallMethod( items , "AddLink", "L2",h2,"",h3,"");
_ObjectCallMethod( g2antt , "EndUpdate");
|
934
|
How can I show the direction of the link using EBN files

OBJECT appearance,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
appearance = _ObjectGetProperty( g2antt , "VisualAppearance");
_ObjectCallMethod( appearance , "Add", 1,"c:\exontrol\images\normal.ebn");
_ObjectCallMethod( appearance , "Add", 2,"CP:1 -1 -1 1 1");
_ObjectCallMethod( appearance , "Add", 3,"CP:1 -2 -2 2 2");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 128");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","1/2/2001","1/4/2001","B1");
h2 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h2,"Task","1/5/2001","1/13/2001","B2");
_ObjectCallMethod( items , "AddLink", "L1",h1,"B1",h2,"B2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.Link(`L1`,14) = 16777216");
h2 = _ObjectCallMethod( items , "AddItem", "Task 3");
_ObjectCallMethod( items , "AddBar", h2,"Task","1/5/2001","1/13/2001","B3");
_ObjectCallMethod( items , "AddLink", "L2",h1,"B1",h2,"B3");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.Link(`L2`,14) = 33554432");
h2 = _ObjectCallMethod( items , "AddItem", "Task 4");
_ObjectCallMethod( items , "AddBar", h2,"Task","1/5/2001","1/13/2001","B5");
_ObjectCallMethod( items , "AddLink", "L3",h1,"B1",h2,"B5");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.Link(`L3`,14) = 50331648");
_ObjectCallMethod( g2antt , "EndUpdate");
|
933
|
How can I show round links

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001","B1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 2"),"Task","1/5/2001","1/13/2001","B2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod( items , "AddLink", "L1",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.FindItem(`Item 1`,0)"),"B1",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.FindItem(`Item 2`,0)"),"B2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.Link(`L1`,15) = True");
|
932
|
How can I change the color to display the arrow of the link

OBJECT g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001","B1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 2"),"Task","1/6/2001","1/14/2001","B2");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod( items , "AddLink", "L1",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.FindItem(`Item 1`,0)"),"B1",_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.FindItem(`Item 2`,0)"),"B2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.Link(`L1`,14) = 255");
|
931
|
I use UnitScale: exHour and I want to show only from 9 to 18 hour. The idea is to show only the working part of a day. Is this possible

OBJECT chart,g2antt,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "MarkTodayColor", _ObjectGetProperty( chart , "BackColor"));
_ObjectSetProperty( chart , "BackColorLevelHeader", 16777215);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 0");
_ObjectSetProperty( chart , "LevelCount", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Label", "<b><%dddd%></b> <%d%>");
_ObjectSetProperty( level , "Alignment", 1);
_ObjectSetProperty( level , "DrawTickLines", 0);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", 65536);
_ObjectSetProperty( level , "DrawTickLines", 65);
_ObjectCallMethod( level , "DrawTickLinesFrom", 0,1);
_ObjectSetProperty( chart , "NonworkingHours", 16253439);
_ObjectSetProperty( chart , "ShowNonworkingUnits", 0);
_ObjectSetProperty( chart , "ShowNonworkingDates", 0);
_ObjectSetProperty( chart , "ShowNonworkingHours", 0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
930
|
Can I display tick lines from other level to my base level so time units gets separated more clearly

OBJECT chart,g2antt,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "DrawLevelSeparator", 0);
_ObjectSetProperty( chart , "UnitWidth", 24);
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 0");
_ObjectSetProperty( chart , "LevelCount", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Alignment", 1);
_ObjectSetProperty( level , "Label", "<%dddd%>");
_ObjectSetProperty( level , "DrawTickLines", 18);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", 65536);
_ObjectSetProperty( level , "Count", 6);
_ObjectSetProperty( level , "DrawTickLines", 66);
_ObjectCallMethod( level , "DrawTickLinesFrom", 0,2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
929
|
Is there any property to change the style of the tick lines being shown in the chart

OBJECT chart,g2antt,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "UnitWidth", 24);
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 0");
_ObjectSetProperty( chart , "LevelCount", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Alignment", 1);
_ObjectSetProperty( level , "Label", "<%dddd%>");
_ObjectSetProperty( level , "DrawTickLines", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", 65536);
_ObjectSetProperty( level , "Count", 6);
_ObjectSetProperty( level , "DrawTickLines", 34);
_ObjectSetProperty( chart , "DrawLevelSeparator", 2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
928
|
Is there any property to change the style of the tick lines being shown in the chart

OBJECT chart,g2antt,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 0");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "DrawLevelSeparator", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Label", "<%dddd%>");
_ObjectSetProperty( level , "DrawTickLines", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", 65536);
_ObjectSetProperty( level , "Count", 6);
_ObjectSetProperty( level , "DrawTickLines", 2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
927
|
How can I show the levels based on the base level so tick lines aligns better

OBJECT chart,g2antt,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "AdjustLevelsToBase", -1);
_ObjectSetProperty( chart , "UnitWidth", 24);
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 0");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0).Label = `<%dddd%>`");
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", 65536);
_ObjectSetProperty( level , "Count", 5);
_ObjectCallMethod( g2antt , "EndUpdate");
|
926
|
How can I show only working hours in other words only the working part of the day

OBJECT chart,g2antt,level;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "AllowSelectDate", 0);
_ObjectSetProperty( chart , "MarkTodayColor", _ObjectGetProperty( chart , "BackColor"));
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 0");
_ObjectSetProperty( chart , "LevelCount", 2);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(0)");
_ObjectSetProperty( level , "Label", "<b><%dddd%></b> <%d%>");
_ObjectSetProperty( level , "Alignment", 1);
_ObjectSetProperty( level , "DrawTickLines", 0);
level = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Level(1)");
_ObjectSetProperty( level , "Label", 65536);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim levObj")
_ObjectCallMethod(g2antt, "TemplatePut", level)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "levObj.ReplaceLabel(`09`) = `<fgcolor=FF0000><b><font ;10>9</font></b></fgcolor>`");
_ObjectSetProperty( chart , "NonworkingHours", 16253439);
_ObjectSetProperty( chart , "ShowNonworkingUnits", 0);
_ObjectSetProperty( chart , "ShowNonworkingDates", 0);
_ObjectSetProperty( chart , "ShowNonworkingHours", 0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
925
|
How can I specify the effort for bars when displaying the overload histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 52");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
_ObjectSetProperty( chart , "HistogramView", 112);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", _ObjectGetProperty( bar , "Pattern"));
_ObjectSetProperty( bar , "HistogramType", 0);
_ObjectSetProperty( bar , "HistogramItems", -6);
_ObjectSetProperty( bar , "HistogramGridLinesColor", 12632256);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 65536);
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/23/2005","","4");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,``,21) = 4");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/24/2005","6/26/2005","",3);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,``,21) = 3");
h1 = _ObjectCallMethod( items , "AddItem", "Task 3");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/27/2005","6/29/2005","",2);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,``,21) = 2");
h1 = _ObjectCallMethod( items , "AddItem", "Task 4");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/30/2005","7/2/2005","",1);
_ObjectCallMethod( g2antt , "EndUpdate");
|
924
|
How can I display the cumulative histogram and showing the bars that generated it using different colors

OBJECT bar,chart,column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 128");
_ObjectSetProperty( chart , "HistogramView", 1300);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 1);
_ObjectSetProperty( bar , "HistogramType", 256);
_ObjectSetProperty( bar , "HistogramCumulativeOriginalColorBars", 0);
_ObjectSetProperty( bar , "HistogramItems", 6);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 128);
_ObjectSetProperty( bar , "HistogramBorderColor", 1);
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim colObj")
_ObjectCallMethod(g2antt, "TemplatePut", column)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectSetProperty( column , "PartialCheck", -1);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 3"),"Task","1/4/2001","1/6/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 4"),"Task","1/2/2001","1/8/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(ItemByIndex(1),0) = 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
923
|
How can I show the cumulative histogram for my bar

OBJECT bar,chart,column,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 128");
_ObjectSetProperty( chart , "HistogramView", 1300);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 1);
_ObjectSetProperty( bar , "HistogramType", 256);
_ObjectSetProperty( bar , "HistogramItems", 6);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 128);
_ObjectSetProperty( bar , "HistogramBorderColor", 1);
column = _ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim colObj")
_ObjectCallMethod(g2antt, "TemplatePut", column)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "colObj.Def(0) = True");
_ObjectSetProperty( column , "PartialCheck", -1);
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 3"),"Task","1/4/2001","1/6/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 4"),"Task","1/2/2001","1/8/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(ItemByIndex(1),0) = 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
922
|
How can I show some grid lines or ruler in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 78");
_ObjectSetProperty( chart , "HistogramView", 1300);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 6);
_ObjectSetProperty( bar , "HistogramItems", 6);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 128);
_ObjectSetProperty( bar , "HistogramGridLinesColor", 255);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
921
|
Is there any property to show some grid lines in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 78");
_ObjectSetProperty( chart , "HistogramView", 1300);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 6);
_ObjectSetProperty( bar , "HistogramItems", 6);
_ObjectSetProperty( bar , "HistogramGridLinesColor", 255);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
920
|
How can I specify a fixed number of bars/items being shown in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 78");
_ObjectSetProperty( chart , "HistogramView", 1300);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 6);
_ObjectSetProperty( bar , "HistogramCriticalValue", 3);
_ObjectSetProperty( bar , "HistogramItems", -6);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Project 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/4/2001","1/7/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/6/2001","1/8/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Project 3");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Project 4");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/4/2001","1/7/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/6/2001","1/8/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
919
|
Is there any option to specify a minimum number of bars/items displayed in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 78");
_ObjectSetProperty( chart , "HistogramView", 1300);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 6);
_ObjectSetProperty( bar , "HistogramItems", 6);
_ObjectSetProperty( bar , "HistogramGridLinesColor", 1);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Project 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/4/2001","1/7/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/6/2001","1/8/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
918
|
How can I show the histogram without grouping the bars based on their parents

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
_ObjectSetProperty( chart , "HistogramView", 1300);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`).HistogramPattern = 6");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project 1");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "AddItem", "Project 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/4/2001","1/7/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/6/2001","1/8/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
917
|
How can I show the histogram for checked item and all recursively child items

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(False) = 128");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 128);
_ObjectSetProperty( chart , "HistogramView", 788);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`).HistogramPattern = 6");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h,0) = 1");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/5/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
h = _ObjectCallMethod( items , "InsertItem", h,"","SubProject");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/3/2001","1/7/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/5/2001","1/8/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
916
|
How can I show the histogram for checked item and its child items

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
_ObjectSetProperty( chart , "HistogramView", 276);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`).HistogramPattern = 6");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellHasCheckBox(h,0) = True");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "InsertItem", h,"","Item 2"),"Task","1/3/2001","1/7/2001");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
|
915
|
How can I show the histogram for all items

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "SingleSel", 0);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
_ObjectSetProperty( chart , "HistogramView", 112);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`).HistogramPattern = 6");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 2"),"Task","1/3/2001","1/7/2001");
_ObjectCallMethod( g2antt , "EndUpdate");
|
914
|
How can I prevent selecting a new item when clicking the chart area so my selection is shown in the histogram

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectSetProperty( g2antt , "SingleSel", 0);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "SelectOnClick", 0);
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
_ObjectSetProperty( chart , "HistogramView", 2);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`).HistogramPattern = 6");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 2"),"Task","1/3/2001","1/7/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.SelectItem(ItemByIndex(0)) = True");
|
913
|
How can I show bars in the histogram for selected items only

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectSetProperty( g2antt , "SingleSel", 0);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "1/1/2001");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
_ObjectSetProperty( chart , "HistogramView", 2);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`).HistogramPattern = 6");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Column");
items = _ObjectGetProperty( g2antt , "Items");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 1"),"Task","1/2/2001","1/4/2001");
_ObjectCallMethod( items , "AddBar", _ObjectCallMethod( items , "AddItem", "Item 2"),"Task","1/3/2001","1/7/2001");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.SelectItem(ItemByIndex(0)) = True");
|
912
|
How can I change the color and size for the curve in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 64");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 68);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 258);
_ObjectSetProperty( bar , "HistogramBorderColor", 65280);
_ObjectSetProperty( bar , "HistogramBorderSize", 5);
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/25/2005",1,1);
_ObjectCallMethod( items , "AddBar", h1,"Task","6/23/2005","6/28/2005",2,2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
911
|
How can I change the color for the frame in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 64");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 68);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 259);
_ObjectSetProperty( bar , "HistogramItems", 5);
_ObjectSetProperty( bar , "HistogramBorderColor", 255);
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/25/2005",1,1);
_ObjectCallMethod( items , "AddBar", h1,"Task","6/23/2005","6/28/2005",2,2);
_ObjectCallMethod( g2antt , "EndUpdate");
|
910
|
How can I force the histogram for a bar being shown all the time

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "ScrollBySingleLine", -1);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Columns.Add(`Tasks`).Def(0) = True");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 64");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 68);
_ObjectSetProperty( chart , "HistogramView", 20);
bar = _ObjectCallMethod( _ObjectGetProperty( chart , "Bars") , "Copy", "Task","H");
_ObjectSetProperty( bar , "Color", 65280);
_ObjectSetProperty( bar , "HistogramPattern", 256);
_ObjectSetProperty( bar , "HistogramItems", 5);
_ObjectSetProperty( bar , "HistogramColor", _ObjectGetProperty( bar , "Color"));
_ObjectSetProperty( bar , "HistogramGridLinesColor", 8421504);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 65536);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramCriticalColor", 8388608);
_ObjectSetProperty( bar , "HistogramPattern", _ObjectGetProperty( bar , "Pattern"));
_ObjectSetProperty( bar , "HistogramItems", 5);
_ObjectSetProperty( bar , "HistogramGridLinesColor", 8421504);
_ObjectSetProperty( bar , "HistogramRulerLinesColor", 65536);
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Hidden");
_ObjectCallMethod( items , "AddBar", h1,"H","6/23/2005","6/28/2005",1);
_ObjectCallMethod( items , "AddBar", h1,"H","6/24/2005","6/26/2005",2);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h1,0) = 1");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemHeight(h1) = 0");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.SelectableItem(h1) = False");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/25/2005",1);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h1,0) = 1");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.CellState(h1,0) = 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/24/2005","7/1/2005",1);
_ObjectCallMethod( g2antt , "EndUpdate");
|
909
|
How can I remove a bar type from the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 40");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramCriticalColor", 8388608);
_ObjectSetProperty( bar , "HistogramPattern", _ObjectGetProperty( bar , "Pattern"));
bar = _ObjectCallMethod( _ObjectGetProperty( chart , "Bars") , "Copy", "Task","Green");
_ObjectSetProperty( bar , "Color", 65280);
_ObjectSetProperty( bar , "HistogramPattern", _ObjectGetProperty( bar , "Pattern"));
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Green","6/22/2005","6/26/2005",0);
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/25/2005",1);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,1,18) = 3");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Green","6/28/2005","6/30/2005",0);
_ObjectCallMethod( items , "AddBar", h1,"Task","6/27/2005","7/1/2005",1);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,1,18) = 3");
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.Bars.Item(`Green`)");
_ObjectSetProperty( bar , "HistogramColor", _ObjectGetProperty( bar , "Color"));
_ObjectSetProperty( bar , "HistogramPattern", 0);
_ObjectCallMethod( g2antt , "EndUpdate");
|
908
|
How can I show the two buttons in the vertical splitter but still resizes the chart when the control gets resized

OBJECT g2antt;
g2antt = ObjectByName("AN1") ;
_ObjectSetProperty( g2antt , "OnResizeControl", 513);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
_ObjectSetProperty( _ObjectGetProperty( g2antt , "Chart") , "LevelCount", 2);
|
907
|
I have seen a screen shot on your web page that shows two buttons on the vertical scroll bar. How can I show them
OBJECT g2antt;
g2antt = ObjectByName("AN1") ;
_ObjectSetProperty( g2antt , "OnResizeControl", 512);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "Chart.PaneWidth(False) = 96");
|
906
|
How can I disable selecting a new item once the user clicks the chart area

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
_ObjectSetProperty( g2antt , "SingleSel", 0);
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "SelectOnClick", 0);
_ObjectSetProperty( chart , "AllowCreateBar", 1);
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 40");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 32);
_ObjectSetProperty( chart , "HistogramView", 2);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`).HistogramPattern = 1");
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/22/2005","6/26/2005",0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.SelectItem(h1) = True");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/24/2005","6/30/2005",0);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.SelectItem(h1) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
905
|
Is there any option to display the chart's header in the bottom side of the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 40");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramView", 112);
_ObjectSetProperty( chart , "HistogramHeight", 96);
_ObjectSetProperty( chart , "HistogramHeaderVisible", -1);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "Color", 16711680);
_ObjectSetProperty( bar , "OverlaidType", 1);
_ObjectSetProperty( bar , "OverlaidGroup", "Task2");
_ObjectSetProperty( bar , "HistogramCriticalColor", 8388608);
_ObjectSetProperty( bar , "HistogramPattern", 512);
_ObjectSetProperty( bar , "HistogramType", 1);
bar = _ObjectCallMethod( _ObjectGetProperty( chart , "Bars") , "Copy", "Task","Task2");
_ObjectSetProperty( bar , "Color", 65280);
_ObjectSetProperty( bar , "OverlaidType", 1);
_ObjectSetProperty( bar , "OverlaidGroup", "Task");
_ObjectSetProperty( bar , "HistogramCriticalColor", 32768);
_ObjectSetProperty( bar , "HistogramPattern", 512);
_ObjectSetProperty( bar , "HistogramType", 1);
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task2","6/22/2005","6/26/2005",0);
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/25/2005",1);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,0,21) = 3");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,1,21) = 4");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Task2","6/28/2005","6/30/2005",0);
_ObjectCallMethod( items , "AddBar", h1,"Task","6/27/2005","7/1/2005",1);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,0,21) = 4");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,1,21) = 1");
_ObjectCallMethod( g2antt , "EndUpdate");
|
904
|
How can I display the child bars as soon as an item gets collapsed

OBJECT chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectSetProperty( g2antt , "LinesAtRoot", -1);
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "FirstVisibleDate", "9/20/2006");
_ObjectSetProperty( chart , "ShowCollapsedBars", -1);
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 96");
items = _ObjectGetProperty( g2antt , "Items");
h = _ObjectCallMethod( items , "AddItem", "Project 1");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","9/21/2006","9/23/2006","A");
h2 = _ObjectCallMethod( items , "InsertItem", h,"","Task 2");
_ObjectCallMethod( items , "AddBar", h2,"Task","9/24/2006","9/26/2006","B");
h3 = _ObjectCallMethod( items , "InsertItem", h,"","Task 3");
_ObjectCallMethod( items , "AddBar", h3,"Task","9/27/2006","9/29/2006","C");
h = _ObjectCallMethod( items , "AddItem", "Project 2");
h1 = _ObjectCallMethod( items , "InsertItem", h,"","Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","9/21/2006","9/23/2006","A");
h2 = _ObjectCallMethod( items , "InsertItem", h,"","Task 2");
_ObjectCallMethod( items , "AddBar", h2,"Task","9/24/2006","9/26/2006","B");
h3 = _ObjectCallMethod( items , "InsertItem", h,"","Task 3");
_ObjectCallMethod( items , "AddBar", h3,"Task","9/27/2006","9/29/2006","C");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ExpandItem(h) = True");
_ObjectCallMethod( g2antt , "EndUpdate");
|
903
|
What exBarEffort property represents

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 40");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/9/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramView", 112);
_ObjectSetProperty( chart , "HistogramHeight", 164);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramPattern", 256);
_ObjectSetProperty( bar , "HistogramType", 1);
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/10/2005","6/11/2005","","1/1=<b>100%");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,,4) = 18");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/12/2005","6/14/2005","","1/2=<b>50%");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,,4) = 18");
h1 = _ObjectCallMethod( items , "AddItem", "Task 3");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/15/2005","6/18/2005","","1/3=<b>33%");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,,4) = 18");
h1 = _ObjectCallMethod( items , "AddItem", "Task 4");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/19/2005","6/23/2005","","1/4=<b>25%");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,,4) = 18");
h1 = _ObjectCallMethod( items , "AddItem", "Task 5");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/24/2005","6/29/2005","","1/5=<b>20%");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,,4) = 18");
_ObjectCallMethod( g2antt , "EndUpdate");
|
902
|
Can I display multiple curves in the histogram

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 40");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramView", 112);
_ObjectSetProperty( chart , "HistogramHeight", 64);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "Color", 16711680);
_ObjectSetProperty( bar , "OverlaidType", 1);
_ObjectSetProperty( bar , "OverlaidGroup", "Task2");
_ObjectSetProperty( bar , "HistogramCriticalColor", 8388608);
_ObjectSetProperty( bar , "HistogramPattern", 512);
_ObjectSetProperty( bar , "HistogramType", 1);
bar = _ObjectCallMethod( _ObjectGetProperty( chart , "Bars") , "Copy", "Task","Task2");
_ObjectSetProperty( bar , "Color", 65280);
_ObjectSetProperty( bar , "OverlaidType", 1);
_ObjectSetProperty( bar , "OverlaidGroup", "Task");
_ObjectSetProperty( bar , "HistogramCriticalColor", 32768);
_ObjectSetProperty( bar , "HistogramPattern", 512);
_ObjectSetProperty( bar , "HistogramType", 1);
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task2","6/22/2005","6/26/2005",0);
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/25/2005",1);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,0,21) = 3");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,1,21) = 4");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Task2","6/28/2005","6/30/2005",0);
_ObjectCallMethod( items , "AddBar", h1,"Task","6/27/2005","7/1/2005",1);
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,0,21) = 4");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,1,21) = 1");
_ObjectCallMethod( g2antt , "EndUpdate");
|
901
|
How can I use the exBarEffort property

OBJECT bar,chart,g2antt,items;
g2antt = ObjectByName("AN1") ;
_ObjectCallMethod( g2antt , "BeginUpdate");
_ObjectCallMethod( _ObjectGetProperty( g2antt , "Columns") , "Add", "Tasks");
chart = _ObjectGetProperty( g2antt , "Chart");
_ObjectSetProperty( chart , "LevelCount", 2);
_ObjectSetProperty( chart , "NonworkingDays", 0);
_ObjectCallMethod(g2antt, "TemplatePut", "Dim chaObj")
_ObjectCallMethod(g2antt, "TemplatePut", chart)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.PaneWidth(0) = 40");
_ObjectSetProperty( chart , "FirstVisibleDate", "6/20/2005");
_ObjectSetProperty( chart , "HistogramVisible", -1);
_ObjectSetProperty( chart , "HistogramHeight", 64);
_ObjectSetProperty( chart , "HistogramView", 112);
bar = _ObjectCallMethod(g2antt, "ExecuteTemplate", "chaObj.Bars.Item(`Task`)");
_ObjectSetProperty( bar , "HistogramCriticalColor", 255);
_ObjectSetProperty( bar , "HistogramPattern", 512);
_ObjectSetProperty( bar , "HistogramType", 1);
items = _ObjectGetProperty( g2antt , "Items");
h1 = _ObjectCallMethod( items , "AddItem", "Task 1");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/21/2005","6/25/2005");
_ObjectCallMethod(g2antt, "TemplatePut", "Dim iteObj,h1")
_ObjectCallMethod(g2antt, "TemplatePut", items)
_ObjectCallMethod(g2antt, "TemplatePut", h1)
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,``,21) = 4");
h1 = _ObjectCallMethod( items , "AddItem", "Task 2");
_ObjectCallMethod( items , "AddBar", h1,"Task","6/27/2005","7/1/2005");
_ObjectCallMethod(g2antt, "ExecuteTemplate", "iteObj.ItemBar(h1,``,21) = 1");
_ObjectCallMethod( g2antt , "EndUpdate");
|